100 PRINT"[147]";:POKE53272,23:POKE53280,0:POKE53281,0
101 PRINT"[156]          [215][200][195] [197]NTERPRISES":GOSUB591
102 PRINT"[159]                                        [146]";
103 PRINT"                                        [146]";
104 PRINT"         [205]C[196]ONALD [197]NGLISH [211]ERIES        [146]";
105 PRINT"[159]                                        [146]";
106 PRINT"                                        [146]";
107 PRINT"               [215][207][210][196][160] [213][211][193][199][197]              [146]";
108 PRINT"[159]                                        [146]";
109 PRINT"                                        [146]";
110 PRINT"         **   REAL  &  VERY    **       [146]";
111 PRINT"[159]                                        [146]";
112 PRINT"[159]                                        [146]":GOSUB235
150 PRINT"[159][147] [215]HAT IS YOUR NAME?   "
152 INPUT N$
154 IFN$=""THEN112
156 GOSUB590
158 PRINT" [201]NSTRUCTIONS?  [217]/[206]
160 [161]R$:[139]R$[179][177]"Y"[175]R$[179][177]"N"[175]R$[179][177]"(null)"[175]R$[179][177]"(null)"[167]160
162 [139]R$[178]"Y"[167][137]400
163 [139]R$[178]"(null)"[167][137]400
190 [153]"OPENLOAD AND AWAY WE GO, "N$".":[141]591:[141]500:[141]590
192 [137]1000
235 [141]591:[141]560
236 [153]"CONT (null)RESS (null)(null)ATNLENVAL PEEKATN(null) TO CONTINUE WAITLIST"
237 [161]U$:[139]U$[179][177][199](32)[167]237
238 [142]
240 [141]592:[141]560
242 [153]"CONT    >>>> (null)(null)ATNLENVAL PEEKATN(null) <<<<   "
244 [161]U$:[139]U$[179][177][199](32)[167]244
246 [153]"ON                                       "
248 [142]
299 :
400 [153]"LOAD              RIGHT$NSTRUCTIONS            OPEN
402 PRINT" [212]HIS IS A WORD GAME FOR GRADE 3, 4,     AND 5 PUPILS."
404 PRINT" [201]T WILL HELP YOU WITH YOUR SPELLING.
406 [153]" (null)OUR TASK IS TO SELECT THE CORRECT
408 PRINT" ADJECTIVE ([158]REAL) OR ADVERB ([158]VERY).
414 [153]"OPEN ATNFTER YOU TYPE IN THE WORD, PRESS        (null)VAL(null)(null)(null)(null) WAIT":[141]235
416 [153]"LOADOPEN     (null)OW, LET'S LOOK AT THE RULES."
418 [141]235:[137]600
499 :
500 [143] <YES>
505 SS[178]54272:[129]EE[178]SS[164]SS[170]28:[151]EE,0:[130]
510 [151]54296,15:[151]54277,42:[151]54278,250
515 [151]54276,23:[151]54273,23:[151]54272,191
520 [129]TM[178]1[164]150:[130]:[151]54276,32:[129]TM[178]1[164]200:[130]
525 [151]54296,0:[142]
530 [143] <NO>
535 SS[178]54272:[129]EE[178]SS[164]SS[170]28:[151]EE,0:[130]
540 [151]54296,15:[151]54277,18:[151]54278,242
545 [151]54276,33:[151]54273,4:[151]54272,48
550 [129]TM[178]1[164]300:[130]:[151]54276,32:[129]TM[178]1[164]400:[130]
555 [151]54296,0:[142]
560 [143] <BLIP>
565 SS[178]54272:[129]EE[178]SS[164]SS[170]28:[151]EE,0:[130]
570 [151]54296,7:[151]54277,42:[151]54278,250
575 [151]54276,23:[151]54273,23:[151]54272,191
580 [129]TM[178]1[164]30:[130]:[151]54276,32:[129]TM[178]1[164]50:[130]
585 [151]54296,0:[142]
590 [129]TM[178]1[164]500:[130]:[142]
591 [129]TM[178]1[164]1000:[130]:[142]
592 [129]TM[178]1[164]2000:[130]:[142]
593 [129]TM[178]1[164]3000:[130]:[142]
600 [153]"LOADSYS           (null)EAL >< (null)ERY
605 PRINT" [158][210]EAL[159] IS AN ADJECTIVE[159] THAT MEANS
610 [153]" PRINTACTUAL; NOT IMAGINARY; NOT ASSUMEDOPEN"
615 [153]"> (null)HAT WAS A SYSREALOPEN DEMONSTRATION OF        STRENGTH.
625 GOSUB240
630 PRINT" [158][214]ERY[159] IS MOST OFTEN AN ADVERB[159]
635 [153]" MEANING PRINTTRUE; REAL; GENUINEOPEN
640 PRINT"> [199]INA PLAYED THE PIANO [158]VERY[159] WELL."
690 GOSUB235
695 GOTO190
700 PRINT" [158][210]EAL[159] IS AN ADJECTIVE[159] THAT NEANS
705 [153]" PRINTACTUAL?OPEN; NOT IMAGINARY; NOT ASSUMED
710 RETURN
720 PRINT" [158][214]ERY[159] IS MOST OFTEN AN ADVERB[159]
725 [153]" MEANING PRINTTRUE; REAL; GENUINEOPEN"
730 [142]
799 :
999 :
1000 [153]"LOAD";:[140]:[151]53281,0:[151]53280,0
1005 P[178]1:C[178]15:H[178]0
1010 [129]J[178]1[164]C
1015 [135]A$,B$,C$
1020 [153]"PRINT#LOAD VALSTR$-48 VALX-3 CLR"[163]14)""N$,[163]30)"LIST(null)TEP:"P""
1025 [153]"PRINT            (null)VALATN(null) <<>> (null)VAL(null)(null)
1030 PRINT"[158]>>> [159]";A$;"
1035 [153]"    (null)RINT THE PROPER WORD ....."
1040 [141]560:[133]"SYS>>>> ";SK$
1045 [139]SK$[178]B$[167]1090
1050 [153]"DEF                  (null)(null)                    OPEN":[141]530:[141]591
1055 [153]"DEF (null)HE ANSWER IS SYS"B$:H[178]H[170]1:[141]560:[141]560:[141]591
1060 [139]C$[178]"1"[167][141]700
1065 [139]C$[178]"2"[167][141]720
1070 [141]240:[137]1095
1090 [153]"                   (null)VAL(null)!                 OPENWAIT":[141]500:[141]591
1095 P[178]P[170]1:[130] J
1999 :
2000 [153]"OPENLOAD(null)OU HAVE NOW COMPLETED VALXERCISE 3.":[141]560:[141]591
2005 [153]"PRINT(null)OU HAVE ANSWERED"C"QUESTIONS":[141]591
2007 [139]H[178]0[167]2020
2010 [139] H[178]1[167][153]"DEF(null)OU MADE ONLY ONE BLOOPER.":[141]530:[137]2025
2012 [153]"DEF(null)OU MADE"H"BLOOPERS.":[141]530:[137]2030
2020 [139]H[178]0[167][153]"SYS                VAL(null)LENVAL(null)(null)VAL(null)(null)!              WAIT":[137]2035
2025 [139]H[178]1[167][153]"OPEN              CHR$OOD (null)ORK!                WAIT":[137]2035
2030 [153]"DEF       (null)RY HARDER!  STR$O IT AGAIN!        WAIT"
2035 [153]"":[141]235
2050 [153]"PRINTLOAD(null)OU HAVE A CHOICE:
2052 PRINT"[208]RESS  [210] [146] TO REPEAT [197]XERCISE 3
2054 [153]"(null)RESS  CHR$ WAIT TO GO TO VALXERCISE 4
2056 PRINT"[208]RESS  [205] [146] TO GO TO DISK MENU
2060 [161]R$:[139]R$[179][177]"R"[175]R$[179][177]"(null)"[175]R$[179][177]"G"[175]R$[179][177]"CHR$"[175]R$[179][177]"M"[175]R$[179][177]"(null)"[167]2060
2062 [139]R$[178]"R"[167][140]:[137]100
2064 [139]R$[178]"(null)"[167][140]:[137]100
2066 [139]R$[178]"G"[167][140]:[137]2080
2068 [139]R$[178]"CHR$"[167][140]:[137]2080
2070 [153]"LOAD (null)ETURNING TO THE DISK (null)VAL(null)(null)
2072 LOAD"MENU",8
2074 RUN
2076 END
2080 PRINT"[147] [204]OADING [197]XERCISE 4
2082 [147]"EXERCISE 4",8
2084 [138]
2086 [128]
2099 :
2100 [143] THE GUTS OF THE UNIT
2110 [131]"CHR$ILLIAN HELPED ME BECAUSE SHE IS A SYS....OPEN FRIEND.","REAL","1"
2115 [131]"(null)HERE WAS A SYS....OPEN HEAVY RAINFALL LAST    NIGHT.","VERY","2"
2120 [131]"RIGHT$T WAS SYS....OPEN QUIET IN THE HAUNTED        HOUSE.","VERY","2"
2125 [131]"(null)HE PRINCIPAL WAS SYS....OPEN ANGRY WITH       ME.","VERY","2"
2130 [131]"(null)NFORTUNATELY, IT WAS A SYS....OPEN FIRE.","REAL","1"
2135 [131]"CHR$REG LAUGHED SYS....OPEN LOUDLY WHEN HE        SAW ME SLIP.","VERY","2"
2140 [131]"(null)HERE WAS A SYS.....OPEN MOOSE ON OUR          FRONT LAWN.","REAL","1"
2145 [131]"RIGHT$T WAS SYS....OPEN COLD THIS MORNING.","VERY","2"
2150 [131]"(null)HE SYS....OPEN POLICEMAN WAS DISGUIED.","REAL","1"
2155 [131]"(null)HEY RAN SYS....OPEN FAST WHEN THE             WHISTLE BLEW.","VERY","2"
2160 [131]"RIGHT$S THAT A SYS....OPEN AIRPLANE OR AN           IMITATION?","REAL","1"
2165 [131]"(null)HE WAS SYS....OPEN HAPPY TO SEE ME.","VERY","2"
2170 [131]"RIGHT$ AM GOING TO HAVE A SYS....OPEN COMPUTER.","REAL","1"
2175 [131]"RIGHT$ THINK SHE PLAYED THE FLUTESYS....OPEN       WELL.","VERY","2"
2180 [131]"(null)HE FLAT TIRE PRESENTED ASYS....OPEN          PROBLEM.","REAL","1"
2199 :
3000 [143] WH CUMBERLAND 93:04:05